[Control] AuthorName=Robert Sheahan CompanyName=Prolink Software DateCreated=08/03/98 Description=MicroVu Q16 BaudRate=2400 Parity=0 BitsPerByte=8 StopBits=1 FlowControl=2 NoOfChannels=1 Port=COM2 Phone= E-Mail= GetString=r DelayTime= InitString= Parse=19 ParseLines 1=*{MoveAbs,10} {SetVar,User0,0} {MoveFirst}~{if,{Var,MoveWarn},~ * ParseLines 2=*{SetVar,Action,1}~,~ {MovePast,0,1,.} {SetVar,User0,{Add,{Var,Us* ParseLines 3=*er0},{if,{Var,MoveWarn},0,1{PushPos}}}}~ {MovePast,0,1,.} {SetVa* ParseLines 4=*r,User0,{Add,{Var,User0},{if,{Var,MoveWarn},0,1{PushPos}}}}~ {if* ParseLines 5=*,{Var,User0},~ {if,{Compare,#=,{Var,User0},1},~ {MoveF* ParseLines 6=*irst} {StartRead} {MoveLast} {StopRead} {ReadVar,Actual}~ ,~* ParseLines 7=* {MoveFirst} {StartRead} {MoveTo,0,1,.} {StopRead} {ReadVa* ParseLines 8=*r,Actual}~ {MoveRel,1} {StartRead} {MoveTo,0,1,.} {StopRea* ParseLines 9=*d} {ReadVar,User0}~ {SetVar,User0,{Div, {Var,User0}, {If,{* ParseLines 10=*Compare,#<,{Var,Actual},0},-,+}60}}~ {SetVar,Actual,{Add, * ParseLines 11=*{Var,Actual}, {Var,User0}}}~ {MoveRel,1} {StartRead} {Move* ParseLines 12=*Last} {StopRead} {ReadVar,User0}~ {SetVar,User0,{Div, {Var* ParseLines 13=*,User0}, {If,{Compare,#<,{Var,Actual},0},-,+}3600}}~ {SetV* ParseLines 14=*ar,Actual,{Add, {Var,Actual}, {Var,User0}}}~ }~ ,~ {MoveP* ParseLines 15=*ast,0,1, } {StartRead} {MoveTo,0,1, } {StopRead} {ReadVar,Actual}* ParseLines 16=*~ {MoveRel,1} {StartRead} {MoveLast} {StopRead} {ReadVar,User0* ParseLines 17=*}~ {SetVar,User0,{Div, {Var,User0}, {If,{Compare,#<,{Var,Actua* ParseLines 18=*l},0},-,+}60}}~ {SetVar,Actual,{Add, {Var,Actual}, {Var,User0}* ParseLines 19=*}}~ }~}~* Notes=1 NoteLines 1=*This script accepts angles in DMS or DD*